object StatusForm: TStatusForm Left = 384 Top = 215 Width = 277 Height = 270 Caption = 'Trace Information' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Scaled = False OnClose = FormClose OnKeyPress = FormKeyPress OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 196 Width = 60 Height = 13 Caption = 'Trace Level ' end object Label2: TLabel Left = 8 Top = 220 Width = 69 Height = 13 Caption = 'Freeze Display' end object Status: TMemo Left = 8 Top = 12 Width = 254 Height = 173 TabStop = False Color = clWhite Lines.Strings = ( '') ReadOnly = True ScrollBars = ssBoth TabOrder = 2 end object BOk: TButton Left = 187 Top = 215 Width = 75 Height = 23 Caption = 'Close' TabOrder = 1 OnClick = BOkClick end object Frozen: TCheckBox Left = 88 Top = 215 Width = 17 Height = 25 Alignment = taLeftJustify Color = clBtnFace ParentColor = False TabOrder = 0 end object LevelBox: TComboBox Left = 90 Top = 192 Width = 30 Height = 21 ItemHeight = 13 Items.Strings = ( '1' '2' '3' '4') TabOrder = 3 Text = '1' OnChange = LevelBoxChange end end